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Prefácio 


Na época em que criei um clube de computador na 
escola em que meu filho estudava, usando o ZX81* e o 
ZX Spectrum**, pude observar o fascínio das crianças 
pelos computadores e o seu grande interesse em 
aprender a programá-los. No entanto, os manuais e 
livros de programação existentes no mercado foram 
escritos para adultos. Este livro tem como objetivo ser 
um guia, através dos conceitos do BASIC do TK90X, 
do jovem leitor. 


Notaz do Tradutor: 


* O ZX81 é um microcomputador inglês compatível com o 
TkK85. 


** O ZX Spectrum é um microcomputador inglês compatível 
com o TK90X. 


Introdução 


Já existem vários livros sobre o TK90X. Eles não foram 
escritos tendo você em mente. Este livro foi. 


Embora você nunca venha a voar em um ônibus 
espacial para a lua, ou lutar com um dragão em uma 
caverna escura e subterrânea, o TK90X poderá lhe dar 
estas emoções. 


Para imitar o vôo do ônibus espacial, ou para criar um 
mundo de fantasias onde você derrota'magos e bruxas, 
e encontra tesouros fabulosos, você precisa saber 
escrever um programa para o computador. 


Programar um computador como o TK90X é muito 
divertido e extremamente fácil. Carolyn Hughes já 
ajudou muitas pessoas a aprenderem a programar o 
TK90X, e neste livro optou por uma forma de fácil 
compreensão para abordar o assunto. 


Você provavelmente não precisará da ajuda de 
ninguém para comandar o TK90X, agora que possui este 
livro. Gaste apenas algumas horas com ele, com seu 
computador ligado, e logo estará fazendo seu 
computador obedecer a todos os seus comandos. 
Além disso, você verá que enquanto aprende coisas 
sobre o TK90X, estará aprendendo sobre computadores 
em geral. Você logo saberá muito, bem mais que 


muitos adultos. E isto vale a pena. 


“| 


Já é hora de começar a descobrir o quanto é divertido 
fazer um computador seguir os seus desejos. 


Tim Hartnell, 
Londres, Março de 1983 


Tim Hartnell é o editor fundador da revista ZX 
COMPUTING, e autor de inúmeros livros populares 
sobre o assunto. 
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O que os 
Computadores 
Podem Fazer 


Bem-vindo ao grupo dos usuários do TK90X! Imagino 
que esteja curioso para saber o quanto esta pequena 
caixinha preta pode fazer. Bem, os computadores 
podem fazer muitas coisas, mas somente com nossa 
ajuda. 


O QUE ELE 
PODE FAZER? 


Apesar do TK90X parecer pequeno, a sua memória é 
ampla e pode executar coisas com extrema rapidez. Se 
você lhe der informações sobre alunos de uma escola, 
por exemplo, ele em poucos segundos pode lhe dar 
respostas tais como quantos meninos com menos de 
dez anos moram em determinada rua — trabalho este 
que seria muito lento e cansativo se fosse feito por 
você. 


A 


JOÃO DA SILVA 
EDUARDO COSTA 
JAIME RIBEIRO 


MARCUS VINICIUS 
MARIO DOLACIO 


Ele também pode lhe ajudar nos estudos. Digamos que 
você tivesse de aprender os nomes e localizações dos 
rios da Austrália. O TK90X poderia mostrá-los na tela, 
perguntar o nome de cada um deles, e corrigir os que 
você errasse. 


Computadores também podem executar tarefas nas 
fábricas. Muitos carros são feitos por robôs conectados 
a computadores que trabalham com rapidez e 
precisão, além de não precisarem do intervalo para o 
cafezinho. No momento, os computadores que 
executam este tipo de tarefa são maiores e mais caros 


do que seu TK90X, mas você poderá descobrir que seu 
TK90X pode fazer algo semelhante, como controlar um 
modelo de ferrovia. 


Até parece que nós, humanos, não somos mais 
necessários, não é mesmo? Mas na realidade somos, 
pois os computadores só fazem aquilo que lhes for 
ordenado, e nada podem fazer até que seres humanos 
lhes mostrem como. 


Quando o seu TK90X foi feito, ensinaram-lhe a fazer 
cálculos matemáticos (adição, subtração, 
multiplicação, divisão, além de outros mais 
complicados). 


397497/143+29=1-D9L6Q9E+A3 


neo o SATA e 
fa di. hi 44 f 06 = ds S 
4 y 
4 
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Ensinaram-lhe também a entender uma linguagem 
chamada BASIC. Se quiser que o TK90X trabalhe para 
você, terá de aprender a usar o BASIC. O objetivo 
deste livro é dar início a esta aprendizagem. O BASIC é 
muito parecido com o inglês, e você não deverá 
encontrar dificuldades. 


Ligando o TK90X 


Coloque o seu TK90X em uma mesa, próximo a um 
aparelho de TV. Se você for usar um televisor colorido, 
poderá ver os seus programas a cores. Se for usar um 
televisor preto e branco, não se preocupe, pois o seu 
TK90X funcionará. Apenas as cores serão apresentadas 
como diferentes tonalidades de cinza. 


O TK90X precisará ser conectado a uma tomada 
elétrica. Caso só se tenha uma, será necessário um 
adaptador, para que o televisor e o computador 
possam ser acoplados à mesma tomada. 

Mais tarde você terá de usar também um gravador 
cassete. Logo, seria útil um adaptador com três ou mais 
tomadas. 


p—— 


Acompanhando o seu TK90X, há um cabo como este: 


O plug pontudo é conectado à saída de vídeo. 


LIGA NO 


LIGA 
NA TV 


A outra ponta é conectada à entrada de VHF de seu 
televisor. 


VOLTAGEM (LLO 
OU 226) ANTES 
DE LIGAR 


— 


Uma extremidade é conectada à tomada de corrente (0) TK90X Conversa 
elétrica, e a outra ao seu TK90X. com Você 


O TK90X usa a tela da TV para falar com você. No 
entanto, você tem que dizer-lhe o que falar. 


Abaixe totalmente o volume da TV. Ligue a fonte de 
tensão. Ligue a TV. 

Coloque o seu aparelho de TV no canal 3 e ajuste a 
imagem até poder observar na tela isto: 


TK90X — Color Computer 


Vamos fazer o TK90X dizer ALÔ para você. Você terá 
de digitar: 


PRINT “alo” 


Vamos ver como se faz isto. 


Vesgo 


O seu TK90X está pronto para trabalhar para você. 


O 
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VOCÊ PRECISARÁ DESTA TECLA PARA 
PRINTE” 


1. Aperte a tecla com a palavra PRINT. 

2. Aperté e segure a tecla SYMBOL SHIFT. 

3. Aperte a tecla contendo as aspas ” (é a mesma que 
usou para PRINT). 

4. Solte a tecla SYMBOL SHIFT. 

5. Digite alo. 


6. Aperte e segure a tecla SYMBOL SHIFT e aperte 
novamente”. 


22 


A tela de sua TV deve estar assim: 


PRINT “alo” 


Agora aperte ENTER. Está logo abaixo da tecla que 
contém PRINT. 


O TK90X obedeceu às suas ordens e escreveu alo. 

A mensagem $ Executado :1, na parte inferior da tela, 
é a forma usada pelo seu TK90X para-lhe dizer que a 
ordem foi executada. 


Aperte ENTER novamente e a tela estará limpa, exceto 
pelo K piscando na parte inferior da tela. 


23 


24 


Erros 


Se você não falar corretamente a linguagem do 
computador, ele não vai lhe entender. 


Exper:mente a 

digitar: NÃO COLOQUE AS 
SEGUNDAS ” 

PRINT" alo 


Aperte ENTER e veja o que acontece. Aparece um 
ponto de interrogação piscante pois o TK90X não 
entendeu. . 
Coloque agora as aspas “e aperte ENTER. Dev 
funcionar agora sem problemas. 

O que fazer se você cometer um erro de grafia? 
Acima da tecla do canto superior direitó está escrito 
DELETE. Esta tecla serve para apagar coisas na tela. 


Digite: 
PRINT “macarao” 


Você esqueceu de um rt 


Agora, aperte e segure a tecla CAPS SHIFT. Aperte a 
tecla ENTER e o cursor L piscante apagará a letra que 
estiver à sua esquerda. Mantenha as teclas 
pressionadas e outra letra será apagada. 

CUIDADO! Se você mantiver a tecla DELETE 
pressionada por muito tempo tudo que você digitou 
será apagado! 


ITZIZI IT AA id dica) 


Agora você pode digitar os seus comandos sem erros. 
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O TK90X 
se Recorda 


O TK90X está obedecendo a seus comandos, mas será 
muito mais fácil para você se ele recordar suas 
instruções. Assim, você poderá fazê-lo repetir as 
mesmas coisas sem ter de digitá-las outra vez. 

Ele se recordará se você colocar seus comandos em 
um programa. 


Um programa é simplesmente uma lista de instruções, 
com um número para cada uma, de forma que o 
computador saiba em que ordem executá-las. 


16 a 
Et) 
l 


Costuma-se numerar as linhas de um programa de dez 
em dez, ao invés de uma em uma, para poder encaixar 
linhas possivelmente esquecidas. 


El 
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NÃO CONFUNDA O NÚMERO 9 
COM A LETRA O. O NÚMERO 
TEM UMA BARRA QUE O 
ATRAVESSA 


Digite: 


10 PRINT'laranjas” 


Aperte ENTER. 
A linha 16 se deslocará para o alto da tela. 
Agora ela está na memória do computador: 


Digite: 


20 PRINT “bananas” (aperte ENTER) 
30 PRINT “peras” (aperte ENTER) 


Se após ter apertado ENTER a linha não for 
exatamente o que desejava, basta digitar novamente o 
que quiser, e apertar ENTER. O TK90X colocará a 
nova linha no lugar da anterior. 


10 PRINT “laranja” 


(assrm ESTÁ MELHOR) 
agro 


10 PRINT “laranjas” 


Quando seu programa estiver pronto, aperte RUN e 
em seguida ENTER para que o computador o 
execute. 


Você deverá ter uma lista de frutas na tela de sua TV, e 
a mensagem Ô Executado 36:1 na parte inferior da tela. 
O número 30 após Executado significa que o TK90X 
concluiu as suas instruções na linha 30 do programa. 


Aperte ENTER. Agora você pode ver a listagem de seu 
programa novamente. 


Digite: 


25 PRINT “uvas” (aperte ENTER) 


A linha 36 desceu, abrindo espaço para a 25. 
O TK90X conhece seus números! 
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Aperte RUN para rodar o programa de novo. Não 
esqueça de apertar ENTER após RUN. 


laranjas 
bananas 
uvas 
peras 


Q Executado 30:1 


Digite mais três linhas: 


15 PRINT 
22 PRINT 
27 PRINT 


NÃO SE ESQUEÇA DE APERTAR 
ENTER APÓS CADA LINHA 


Rode (RUN) o programa e veja o que estas linhas 
causaram. 
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Um Novo Programa 


Você está pronto para escrever um novo programa? 
Diga isto ao computador apertando a tecla NEW, Esta 
é a mesma tecla da letra A. Agora aperte ENTER. 


A memória de seu TK90X está agora limpa outra vez 
para o seu próximo programa. 


Façamos o computador imprimir o seu nome. 

Digite: 

16 PRINT” 

Você precisa de uma letra maiúscula. Aperte e segure 
a tecla CAPS SHIFT. Aperte a tecla correspondente à 
primeira letra de seu nome. 


Solte a tecla CAPS SHIFT e termine de digitar o seu 
nome. 


Agora você precisa de um espaço. 


AQUI ESTÁ A 
TECLA SPACE 


— — 


Aperte a tecla SPACE para dar um espaço em branco. 
Digite o seu sobrenome, com a letra inicial maiúscula, 
cologue as aspas e aperte ENTER. 


Rode (RUN) o programa e aperte ENTER para ver de 
novo a listagem de seu programa. 


ANTES DE ESCREVER UM NOVO 
PROGRAMA, LIMPE SEMPRE À 


MEMÓRIA COM NEW E ENTER 


EXERCÍCIO: 


Adicione algumas linhas ao seu programa para que o 
computador imprima (escreva) também o seu 
endereço. Procure pela vírgula e pelo ponto no 
teclado do seu TK90X. Eles estão em vermelho; logo, 
toda vez que tiver de usá-los, terá de pressionar 
simultaneamente a tecla SYMBOL SHIFT. 


Se tiver problemas vá ao capítulo 27 na página 112. 
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Strings* 


Até agora, todos os nossos programas tiveram strings. 
Hi HoH=HoHOHE MEO) 


Um string é uma segiência de letras, números ou 
símbolos, tais como + ou *, chamados caracteres. 
C,$,&,+ são caracteres. 


Quando você desejar imprimir um string na tela, basta 
colocar aspas ”' no começo e no fim do string. O 
computador imprime tudo que estiver entre as aspas. 
Você pode pensar nas aspas como nós nas pontas de 
um string para evitar que as letras se percam. 


* Veja nota sobre tradução. 


Existem também strings vazios, sem mesmo um espaço 
em branco entre as aspas. Tais strings são chamados 
nulos. 


atm, À PRINT” ” ) 


Lo 
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34 


Cursores 


Imagino que você queira saber o que são as letras K e 
L piscantes que frequentemente aparecem na tela. Elas 
são chamadas cursores, e indicam que o TK90X está 
pronto e esperando que você digite algo. 


EU ESTOU 
PRONTO! 


Em cada tecla, com exceção das superiores, existe 
uma palavra. Estas são chamadas de palayras-chave 
(em inglês Keywords). Se você apertar gialquer 
uma destas teclas quando o cursor for'a letra K, a 
palavra-chave aparecerá na tela. Você já usou as 
palavras-chave PRINT e RUN. 

Se você apertar uma tecla quando o cursor for a letra 
L, aparecerá na tela uma letra. 

A linha de teclas superior, que contém os números, . 
imprimirá os números, sendo o cursor a letra K ou à 
letra L. 


1 


“ É MUITO FÁCIL LEMBRAR: 
K PARA KEY WORD E 
L PARA LETRA 


a tecla DELETE. (Se precisar de ajuda volte ao 
capítulo 4.) 


Em cada tecla, além das letras e palavras-chave, 


na tela, pressione e segure a tecla SYMBOL SHIFT e 
aperte o símbolo que desejar. 


A TECLA SYMBOL SHIFT EM . 
VERMELHO PÁRA 08 SIMBOLOS E 
PALAVRAS EM VERMELHO 


EXERCÍCIO: 


Escreva um programa para imprimir uma linha de 
asteriscos * no topo da tela. 


Aperte algumas teclas. Observe o cursor mudar de K 
para L. Quando tiver terminado, apague tudo usando 


existem símbolos em vermelho. Para fazê-los aparecer 
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Espaçadores 


Os espaçadores ajudam você a colocar as coisas onde 
quiser na teia. 


Digite e rode (RUN) este programa: 


10 PRINTYGUARDA” 


E 
S> 
20 PRINT“CHUVA” GUARDA E À 


CHUVA 


Agora troque a linha TM / 


10 digitando 


16 PRINTYGUARDA 


Rode (RUN) o programa novamente. 


GUARDA CHUVA 


E sm 


A vírgula diz ao TK90X para mover até a outra metade 
da tela e então imprimir o próximo item. Digite 


10 PRINT“GUARDA"; 0) 


Você encontrará o ponto-e-vírgula (;) na mesma tecla 
da letra O. Como ele está em vermelho, é necessário 
pressionar a tecla SYMBOL SHIFT. 


Quando rodar este programa (RUN) obterá: 


GUARDA-CHUVA | 


O ponto-e-vírgula diz ao computador para não deixar 
qualquer espaço em branco antes de imprimir o 
próximo item. 


Se desejar usar , ou ; como espaçadores, eles deverão 
estar fora das aspas. Se você os colocar dentro, farão 
parte do string e serão impressos na tela. 


e PRINT 
“Joao da Silva)” 


Agora aperte NEW e ENTER para um novo 
programa. 
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Este espaçador, que se parece com um apóstrofo, é 
útil se você tiver de digitar uma sentença muito longa. 
Digite 

10PRINT“Na semana que vem iremostrabalhar em casa” 
Agora rode (RUN) este pequeno programa. 


SIGNIFICA 
TRABALH? 


Você precisa usar 
EU VOU 
AJUDAR! 


Digite cuidadosamente esta linha: 
10 PRINT“ Na semana que vem iremos” * “trabalhar em casa” 


ESTOU EM VERMELHO! 


NA TECLA? 


O * ordena ao TK90X que salte para a linha seguinte. 


ASSIM ESTÁ 
MELHOR 


Na semana que vem iremos 
trabalhar em casa. 


O Executado 10: 


38 


to 


OTK90XEspera | 
por sua Resposta 


Agora você já sabe como fazer o TK90X dizer algo que 
você deseje. Você poderia fazê-lo perguntar algo. 


Limpe a memória do computador apertando NEW e 
depois ENTER. 


Agora digite este programa: 


19 PRINT“Qual e o seu nome?” 


9 ESTÁ EM VERMELHO NA TECLA G. 
VOCÊ PRECISA PRESSIONAR A 
TECLA SYMBOL SHIFT COM ELA. 


Rode (RUN) o prógrama. 


Qual e o seu nome? 


Q Executado 10 :1 


O TK90X não esperou por sua resposta! 
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Adicione estas duas linhas ao seu programa: 


20 INPUT a$ 
30 PRINT'AIo “ag 


UM ESPAÇO 
— AQUI 


Rode (RUN) novamente o programa. 


Quando o cursor “L” aparecer piscando na tela, digite 
seu nome e aperte ENTER. 


QUAL E O SEU NOME? 


ALO, 4, "a 


Desta vez o TK90X não só esperou por sua resposta, mas 
lembrou-se do seu nome e dirigiu-se a você usando-o. 


EXERCÍCIO: 


Altere seu programa de forma que o TK90X deixe uma 
linha em branco entre perguntar o seu nome e dizer 
“Alo”. Você poderá encontrar mais de uma maneira 
para fazer isto. 


As Caixinhas 


Eis como o TK90X lembrou-se de seu nome. 

Em sua memória existe uma parte especial só para 
guardar strings. Esta seção da memória é como 26 
caixinhas, inicialmente vazias, com rótulos em branco. 


DOSDSISOITDD 
O O 


Na tinha 26 do seu último programa, o TK90X viu 
INPUT a$. Ele não pensou “Oba, vem algum dinheiro 
para mim!”. Sabia que um string estava chegando e 
tinha de preparar uma caixa para guardá-lo. 


Primeiro o TK90X verificou se alguma caixinha já tinha. 
o rótulo a. Não tinha. Então ele deu o nome af a 
uma das caixas e esperou para ver o que você iria 
colocar nela. 


CT 


Você digitou o seu nome, que então foi colocado 
dentro da caixa com o rótulo a$. 


[o ya 


Na linha 36, depois de imprimir “Alo”, o computador 
olhou dentro da caixa a$ e imprimiu o string que lá 
encontrou. 


O seu nome ainda está na caixa a$. Ele ficará lá até 
que você coloque outra coisa ou até apertar RUN, o 
que irá esvaziar todas as caixas. 


Confira se seu nome ainda está lá, digitando PRINT a$ 
e apertando ENTER. 


Rode (RUN) o programa outra vez, mas quando lhe 
for perguntado “Qual e o seu nome?” digite um nome 
diferente. O novo nome ficará na caixa a$. 


a$ é chamada de variável string, pois você pode 
variar, ou trocar o string que nela está guardado. 
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E | 

Você pode ter até 26 variáveis string num programa 
(lembra-se das 26 caixinhas?). Elas podem ser 
chamadas a$, b$ etc. até z$. 


EXERCÍCIO: 


Escreva um programa em que o TK90X lhe pergunte a 
cidade ou bairro onde você mora. Você digita a 
resposta e o computador deve imprimir o nome de sua 
cidade ou bairro, e em seguida deve dizer que é um 
lugar agradável de se viver. Certifique-se de que as 
palavras estão bem dispostas na tela. 


Você o faz desta forma: 


10 LET a$="caixinha” 


“caixinha” dentro dela. 


Outro Caminho 
até as Caixinhas 


Você pode dizer ao TK90X o que colocar em uma 
caixa de variável string antes de rodar o programa. 


Assim que você rodar este programa, o TK90X vai 
chamar uma caixa de a$ e colocará a palavra 


CRUEL, 
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Isto será útil em um programa longo em que você 
queira que a palavra “caixinha” seja impressa várias 
vezes. Em vez de ter de digitar 

PRINT'caixinha” toda vez, você teria somente de 
digitar PRINT a$, o que é mais rápido. 


Lembre-se de não mandar o TK90X imprimir o 
conteúdo de uma caixa antes de colocar algo dentro 
dela. Ele não é mágico. 


2 Variável 
inexistente 0:1 


NÃO CONSIGO 
ENCONTRÁ-LA 


Números 


Chegamos agora em algo que o TK90X já sabe muito 
bem. 


Vamos testar a sua matemática. Digite: 
PRINT 132 + 499 (aperte ENTER) 

Ele realmente é rápido em adição. 
Tente agora uma questão de subtração: 
PRINT 2954 - 877 


Os sinais de multiplicação e divisão são diferentes dos 
usuais. 


AO Vem | 
sr" o + É MULTIPLICAR 
(ez 
/ É DIVIDIR 


— 


Ache-os no teclado. Eles estão em vermelho na linha 
inferior. Dê ao TK90X algumas questões de * 
multiplicação e / divisão. Ele pode operar com 
números bem grandes, mas quando forem muito 
grandes a resposta será dada de uma forma que você, 
provavelmente, não entenderá. 


B(PRINT 23/999999999 


Se você lhe perguntar algo que envolva + — + e /, ele 
executará os cálculos em determinada sequência. 


Peça-lhe: PRINT2 + 3x4 

Ele lhe deu a resposta que esperava, ou você achava 
que ele ia responder 26? 

Em uma operação mista, o TK90X efetuará primeiro as 
multiplicações e divisões e depois as adições e 
subtrações. 
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Para que ele faça primeiro as adições e subtrações, 
estas expressões terão de ser colocadas entre 
parênteses. 


Tente PRINT (2 + 3) *4 


EU FAÇO A PARTE ENTRE 
PARENTESES PRIMEIRO 


2+3:5 
5*4-20 


EXERCÍCIOS: 


1. Tente formular outras questões aritméticas e veja se 
os resultados correspondem ao esperado. 


2. Descubra a diferença entre: 
PRINT5S-3 


e 
PRINT “5-3” 


Mais Caixas 


No capítulo 10 você colocou um string dentro de uma 
caixa chamada a$. Números também podem ser 
guardados em caixas. 


Digite este programa: o 
DIGITE E 

TO INPUT à UM NUMERO] - a 

20INPUT b Rê 

30LETc=a+b 

40 PRINT c A 


Quando você rodar este programa, tudo que verá na 
tela será o cursor piscante “L”. Isto significa que o 
TK90X está esperando por um número, logo digite um 
qualquer e aperte ENTER. O computador colocará 
este número na caixa a (linha 10). O cursor “L” ainda 
está piscando na tela, logo digite outro número e 
aperte ENTER. O computador soma os dois números e 
coloca a resposta dentro da caixa c (linha 36). Em 
seguida ele imprime o conteúdo da caixa c (linha 40). 


| 


—— 


Às caixas numéricas (ou variáveis numéricas) podem 
receber como nomes letras do alfabeto, mas você 
pode dar nomes maiores se assim o desejar. Você 
pode ter uma variável numérica chamada SCORE, ou 
RESPOSTA 5. Isto às vezes pode ser útil pelo fato de 
lembrar-lhe o que significa o número contido nesta 
caixa. 


EXERCÍCIO: 


Escreva um programa em que você ponha no 
computador dois números (chame-os de NUMERO 1 
e NUMERO 2) e o computador os multiplique, 
colocando a resposta em RESPOSTA. Não esqueça de 
mandar o computador PRINT RESPOSTA no final. 
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Fazendo Alterações 


Até agora já ensinamos duas maneiras de mudar o que 
você digitou. Se não tiver apertado NEW LINE, você 
pode usar o RUBOUT para apagar. Se já tiver apertado 
NEW LINE, você pode trocar a linha do programa 
digitando-a novamente. 


Você já deve ter notado [>] após o número de uma 
linha em seu programa — é chamado o cursor de 
programa e aponta a linha que acaba de ser 
introduzida no computador. 


EU ESTOU NA INPUT NUMEROL 
LINHA 40 INPUT NUMERO? 
LET RESPOSTA = 


NUMEROI + NUMERO? 
40> PRINT RESPOSTA 


Pressione (e segure) a tecla CAPS SHIFT e aperte a 
tecla que tem EDIT escrito acima dela. 


O TK90X copiará a linha e esta aparecerá na parte 
inferior da tela com o cursor piscando logo após o 
número da linha. 


Acima das teclas 5, 6, 7 e 8 existem quatro setas: 


Los 
[5] Ls) ()(8) 


Com um dedo pressionando CAPS SHIFT, aperte 8. 


O cursor se moverá para a direita. Se você mantiver as 
teclas pressionadas, o cursor se moverá até o final da 
linha. 

Com um dedo pressionando CAPS SHIFT, aperte 5 e 
o cursor se deslocará novamente, só que para a 
esquerda. 


e À 
Utilizando as setas, você poderá mover o cursor para a 
posição em que quer apagar OU inserir algo. 

Se você tiver 


44 PRINT RESPOSTA 


na parte inferior da tela, mova o cursor até que esteja 
entre PRINT e RESPOSTA. Agora digite: 


“A resposta e "; 


Aperte ENTER e a sua nova linha 40, mais longa, estará 
no programa. 


O que se deve fazer para alterar a linha 10, se 
necessário? 


Com um dedo pressione CAPS SHIFT e aperte 7. 


O cursor de programa subirá uma linha. Se você 
quiser que o cursor desça, pressione CAPS SHIFT e 6. 


pego | | 
gi Lbajês 


Quando o cursor estiver na linha correta, aperte CAPS 


[O e EDIT e ela aparecerá na parte inferior da tela. 
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Pratique o uso das quatro setas e EDIT. Quando 
desejar que a linha na parte inferior da tela volte ao 
programa, basta apertar ENTER. 


Uma forma rápida de mover o cursor de programa à 
linha desejada é usando LIST, que é a palavra-chave 
na tecla K. Aperte LIST e depois ENTER e o cursor se 
deslocará para a primeira linha do programa. LIST 20 
levará o cursor para a linha 20, LIST 36 para a linha 36 
e assim por diante. 
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O TK90X 
Toma uma Decisão 


Neste programa o TK90X mostra que sabe escolher as 
pessoas com quem fala. 


10 PRINT “Qual e o seu nome?” 

20 INPUT af 

3ÓCLS 

40 IFaf <> “Mickey Mouse” THEN PRINT “Nao 
falo com gente chamada” “ ab 


CLS E IF SÃO U ESTOU 
PALAVRAS-CHAVE. | | NA TECLA 
w 


THEN ESTÁ EM 
VERMELHO NA 
Ei ) TECLA G, PRECISA 
( 


Eca SHIFT 
ZP, 


< > significa “diferente de”. 


Rode este programa. 
Qual a função de CLS? 


ELE LIMPA 
A TELA* 


* Nota do tradutor: CLS vem de Clear Screen 
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Na linha 49 0 TK90X olhou dentro da caixa a$. Se ele 
não encontrasse Mickey Mouse daria uma resposta 
grosseira. 


EU NÃO VOU 
FALAR COM 


Se ele encontrasse Mickey Mouse não escreveria nada. 
Vamos mudar isto. 


Traga a linha 40 para a parte inferior da tela usando 
EDIT. (Se necessário reveja o último capítulo.) 
Desloque o cursor para a direita até o fim da linha e 
adicione: STOP 


Aperte ENTER para devolver a nova linha 40 ao 
programa. 


Digite agora: 
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e 


56 PRINT “Prazer em conhecer voce.” 


Rode (RUN) o programa. Dê o seu nome como sendo 
Mickey Mouse e veja o que acontece. 


Como Mickey Mouse estava em af, o TK90X pulou a 
linha 49 e foi direto para a linha 50. 


Até agora nós só havíamos dado uma única instrução 
por linha para o computador. A linha 40 apresenta 
duas. 


SE Mickey Mouse NÃO ESTIVER EM af, 
PRIMEIRO EU PRECISO IMPRIMIR “NAO 
FALO COM GENTE CHAMADA...” 

E DEPOIS PARAR (STOP). 


É preciso haver dois pontos (:) entre cada instrução. 


EXERCÍCIOS: 
1. Descubra o que acontece se você não colocar 
: STOP na linha 46. EDITe a linha 40 e apague : STOP. 


Em seguida rode o programa e dê o seu próprio nome. 


2. O TK90X adora comer chips. Escreva um programa. 
em que: 


16 O computador lhe pergunta qual o seu prato 
favorito. 

20 Você digita a sua resposta que é colocada em pf. 

30 A tela é limpa. 

40 Se você não responder “chips”, o TK90X 
lhe diz que não gosta de seu prato e que ele 
prefere chips. 

56 Se você responder “chips”, o TK90X diz que 

concorda com você. 
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O TK90X 
Repete o que Faz 


Digite este pequeno programa. 


TOINPUT a 
26 INPUT b 
30GOTO 16 


GOTO ESTÁ 
NA TECLA G 


Rode este programa. Quando vir o cursor “L” 
piscando, digite um número. O TK90X o escreve e 


depois espera por outro. Como fazê-lo parar? 
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Em vez de colocar um número, pressione SYMBOL 
SHIFT e STOP depois ENTER. 


Tente agora: 


10 INPUT a$ 
20 PRINT a$ 
30GOTO 10 


O cursor “L” piscante indica que o computador está 
esperando por um string. Pressionar SYMBOL SHIFT e 
STOP desta vez não funciona. O TK90X.vê STOP como 
um string e o coloca dentro de a$. 


Eis a forma de solucionar este problema. Apague as 
primeiras aspas do cursor, logo você tem L” no canto 
da tela. Pressione agora SYMBOL e STOP. Você saiu do 
lIoopflaço) * 


Quando estiver escrevendo um programa, você poderá 
acidentalmente entrar em um tipo de loop em que 
STOP não funcione. Eis aqui um exemplo: 


10LETn = 1 
20 GOTO 16 


Quando você rodar este programa, tudo que verá será 
uma tela em branco, sem cursor. 


Você precisa sair do loop. 

A tecla SPACE também contém a palavra BREAK. 
Aperte CAPS SHIFT e também BREAK SPACE. Digite 
ENTER e você verá novamente a listagem de seu 
programa. 

Loops podem ser muito úteis, se você tiver certeza de 
que o programa diz ao computador o momento em 
que ele deve sair do loop. 


* Veja no início desta obra Nota sobre a Tradução. 
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Loo 1] 


Eis um exemplo: 


10 PRINT “Digite um numero” 
20!NPUT n 

301Fn = ÓTHEN STOP 
40CLS 
SÓPRINTn;C*12=";n*12 
60 GOTO 10 


Quando desejar parar este programa, basta digitar O 
(zero). 


EXERCÍCIO: 
Escreva um programa em que: 


16 O computador pergunta por um nome. 

20 Você digita um, e este é colocado em n$. 

30 Se você digitar “fim” o computador pára (stop). 
46 O computador imprime o nome. 

56 O computador volta ao início do programa. 


O TK90X Escolhe 
um Número 


Em muitos jogos, é necessário que o computador 
escolha um número sem que você saiba qual. O TK90X 
tem em sua memória uma longa lista de números. Ele 
escolherá um, aleatoriamente*, quando você usar RND. 
RND está escrito em azul acima da tecla T. Para 
colocá-lo na tela você precisará da ajuda de outro 
cursor, O cursor E. 


PRAZER EM 


Após limpar a memória do computador com NEW, 
pressione CAPS SHIFT e SYMBOL SHIFT 
simultaneamente. Solte-as ao mesmo tempo. 


Agora deve estar na tela o cursor E piscante. 


Aperte a tecla que tem RND escrito em azul acima 
dela. 


Apague RND e digite este programa: 


10 PRINT RND 
20GOTO 10 


Use sempre o cursor E para RND, Não digite as letras 
(R,N,D) uma a uma, senão o computador pensará que 
é uma variável numérica e procurará pela caixa 
rotulada RND. 


Quando você rodar o programa, o TK90X imprimirá 


, uma lista de números e então lhe perguntará “scroll”, 


o que significa “você deseja que eu deslogue estes 
números para cima e imprima mais alguns? ” Caso 
você não queira, basta apertar N ou SPACE. 

Caso deseje que ele continue imprimindo, aperte 
qualquer outra tecla. 


Olhe para os números na tela. Eles não são o tipo de 
números nos quais gostaríamos de jogar, são? Seria 
impossível adivinhar qualquer um deles. 
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ADIVINHAR O MEU 
NÚMERO! 


Nós precisamos de números maiores, sem todos esses 
decimais. Mude o programa para: 


16 PRINT INT(RND * 10) + 1 
20 GOTO 16 


INT PRECISA DO CURSOR E 


INT RND 


; T 
| 
Ú 
4 


BS Carro 


cet 


Rode o programa. Faça o computador encher algumas 
telas, e verá que todos os números que ele escolheu 
estão entre 1 e 10. 


Lo. 


66 


Na linha 16, RND * 16 aumentou o número, INT 
cortou todos os dígitos após o ponto decimal” e +1 
simplesmente serviu para que o computador nunca lhe 
desse o número (9. 


BT7342109 
PRINT RND á 


oo 


PRINT RND + 10 


Você sabe porque precisamos colocar RND * 10 entre 
parênteses? É para que o computador faça esta parte 
primeiro. 


* O ponto decimal corresponde, na notação em inglês, à vírgula 


gue se usa no Brasil para separar a parte inteira de um número 
da fracionária. O TK90X, como quase todos os computadores, 


usa a notação americana. Você terá que se acostumar com isso, 


o que não é difícil. 
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PRINT ENT (RND + 19) 


PRINT INE (RND + 18) + 


Agora nós estamos prontos para um jogo de 
adivinhações. 


tÓLET a = INT(RND*5) + 1 

20 PRINT “Adivinhe meu numero?” 

30 PRINT “Voce acha que e 1, 2,3, 4 ou 5?” 

40 INPUT b 

50 PRINT b 

601F b = a THEN PRINT “Certo. Você adivinhou” 
701F b = a THEN STOP 

80 PRINT “Errou”; “Tente outra vez/':GOTO 40 


QUAL NÚMERO 
EU DEVO COLOCAR? 


O TK90X jamais ganhará este jogo. Você tem quantas 
chances precisar. Façamos isto mais justo. Desta vez 
você só terá 3 chances. 


Usaremos a caixa t para guardar o número de 
tentativas que você fizer. No começo você não terá 
nenhuma tentativa, portanto digite: 

SLETt= 0 


Você faz sua tentativa de acertar na linha 46 (INPUT 


b). Logo após cada tentativa, precisamos adicionar 1 
ao número em t. 


45LETt=t+1 


Quando você tiver feito 3 tentativas, não terá mais 
chances, logo precisaremos mudar a linha 80. 


801F t < 3 THEN PRINT “Errou””, “Tente outra vez” 


:GOTO 40 
EU ESTOU NA 
TECLA R 


< significa “menor que”, 


Deixe o TK90X congratular-se se conseguir vencer: 


120 PRINT “Eu ganhei! O numero era "; a 


E 
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EXERCÍCIO: 
Escreva um programa em que: 


16 O TK90X escolhe um número entre 1e 1h e o 
coloca em a. 

2600 TK90X escolhe um número entre 1 e 1bde o 
coloca em b. 

30 Ele soma a com b e coloca o resultado emc. 

40 Ele imprime a;“ +" ;b; 

50 Você digita a sua tentativa de r resposta, que é 
colocada em d. 

600 TK90X imprime a sua resposta. 

70 Se a sua resposta estiver correta, o TK90X deve 
congratulá-lo e parar O programa. 

890 TK90X diz a você a resposta correta. 
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Loops para 
Contagem 


No último capítulo nós rotulamos uma caixa de 
variável numérica de te a usamos para contar o 
número de tentativas que você efetuou. 


ELE JÁ TENTOU 
DUAS VEZES 


O TK90X tem, na realidade, um conjunto de caixas 
especiais, chamadas variáveis loop, que são usadas só 
para contar. Quando você quiser usar uma, precisa 
dar-lhe um nome. Este nome deve ser uma letra do 
alfabeto. Eis um programa que irá imprimir o nome 
“TK90X” vinte vezes. 


1ÔFORL = 1 TO 20 
20 PRINT L, “TK90X”” 


30 NEXT L 
NÓS ANDAMOS 
x JUNTOS 


FOR E NEXT SÃO 
PALAVRAS-CHAVE, 


n 


e 


O TK90X começa rotulando uma caixa de variável 
loop de L e colocando 1 dentro dela. 


Depois entra no loop. 


O NÚMERO L ESTÁ ENTRE 1 E 20º 
SE NÃO ESTIVER EU DEVO 
SAIR DO LOOP 


O PRÓXIMO NÚMERO 
EMLE VOLTO 


72 


Rode o programa, e verá o computador contando de 1 
a 2Ô enquanto escreve seu próprio nome, Você pode 
fazê-lo contar mais devagar, dizendo-lhe para fazer 
pausas (PAUSE). 


Digite 


25 PAUSE 56 


PAUSE É A PALAVRA- 
CHAVE NA TECLA M 


Quanto maior for o número após a palavra 
PAUSE, mais longa será a pausa. 


Eis um programa que imprime a tabuada do 9 até 12X9: 


10FORa = 1 TO 12 
20PRINT a; *9 =a*9 
30 NEXT a 


O computador fará o loop 12 vezes. Cada vez que ele 
atingir a linha 26, olhará dentro da caixa e escreverá o 
número que encontrar. Em seguida, escreverá o string 
“*9 «=! Depois disto ele calculará o valordea *9e 
escreverá a resposta. NEXT a-adiciona um (1) ao 
número contido em a e manda o computador voltar à 
tinha 10 novamente. 
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12 ESTÁ EM a, 
ENTÃO EU 
IMPRIMO 

12+9 = 198 


EXERCÍCIOS: 
1. Diga ao computador para imprimir a tabuada de 16 
até 16 x 20. 


2. Diga ao computador para imprimir 704 pontos de 
interrogação, sem deixar qualquer espaço em 
branco entre eles. 


Desenhando 
com o TK90X 


Você verá nas teclas de 1 a 8, localizadas na parte 
superior do teclado, os caracteres gráficos. 


GRAPHICS 


pop opa[em smp ] 


Você poderá usá-los para fazer figuras simples. Existe 
um cursor gráfico, um G piscante, para imprimir estes 
caracteres. 


Para colocá-los na tela, pressione CAPS SHIFT e a tecla 
9, que tem a palavra GRAPHICS acima dela. 
Aperte agora as'teclas de 1 a 8. 


ATECLA 8 
LHE DÁ UM ESPAÇO 


a a 


Aperte e segure CAPS SHIFT enquanto pressiona 
novamente as teclas de 1a 8. 
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SHIFT 8 
LHE DÁ UM QUADRADO 


Ralo sa ER 


PRETO 


Estes caracteres são o “inverso” dos produzidos 
quando não se pressiona CAPS SHIFT. O que era preto 
passou a ser um espaço e vice-versa. 


GRAPHIC 1 [ms & GRAPHIC 1 
ter com SHIFT 


Quando terminar de usar os caracteres gráficos, aperte 
9eo cursor L voltará à tela. 

Limpe a tela para fazer um pequeno programa que 
desenhará um carro. 


TO PRINT“ am * 
20PRINT "O O! 


Depois de ter digitado 10 PRINT”, troque o cursor para 
G pressionando CAPS SHIFT e 9. 


Os caracteres necessários são: nl E mm 


Aperte e segure CAPS SHIFT e pressione 2, 1, 3. Solte 
a tecla CAPS SHIFT e pressione 9 para obter de volta o 
cursor L. Agora você pode fechar as aspas ("). 


A linha vinte (20) imprime as rodas, duas letras O 
maiúsculas com um espaço em branco entre elas. 


Tente agora alguns programas que desenhem figuras. 
Você pode tentar desenhar uma fábrica, um 


cavalo, ou um ser extraterrestre. Ajudará se você 
desenhá-los em papel quadriculado, antes de escrever 
o programa. 


Nem sempre se deseja a figura no topo esquerdo da 


tela. 
UM CARRO VOADOR?! 
VS 


Felizmente existe uma forma de dizer ao TK90X onde 
imprimir na tela o que se deseja. 


Imagine que a tela de seu televisor seja dividida em 
quadrados como estes: 


O MEU NOME 


ESTÁ NA LINHA 8 


TK90X 


Existem 22 linhas, que são numeradas de 6 (linha 


superior) a 21 (linha inferior). 


O| mel jm] +) in[ 10] =| c0i os 


10 
11 
2 
3 
4 
5 
16 
y 
18 
19 
20 
21 


vs ERR 
siso ——+» 


e Reza rm lGÕÃBMÃSãmMÃSMN S MÃE zm Ud 6 Ss E] 
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na 


( 


das de O 


Existem 32 colunas, que são numera 


esquerda) a 31 (na direita). 


Cs Nmtingndo a 


Dn] 
& 
E 
a 
cá] 
Ha 
nã 
[e 
& 
<g 


0X ESTÁ NA 


S 
Vo 
Sa 
2". 
5% 
vo 
E o 
Sa 
Ram 
Ec 
35H 
=s 
Es 
=o 
o q 
EE 
Es 
Vv o 
Po 
o 
xs 
S 
So U 
X E 
[- 

oe 
T'o 
5 E 
N'= 
oa 
v 
5 
Es 


coluna. 
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Digite: 
PRINT AT 16,22;X” 


AT ESTÁ EM 
VERMELHO 


NÃO ESQUEÇA 
DA,EDO; 


Tente imprimir outros caracteres em diferentes lugares. 


Lembre-se de que as linhas vão de 0 a 21 e as colunas 
de fa 31. Se você disser ao TK90X PRINT AT 
30,40;'X", ele não poderá fazê-lo. 


5 Excede área 
de vídeo Q:1 


Para imprimir uma palavra em determinado ponto da 
tela, você deve dizer ao computador a linha e coluna 
em que deve estar a sua primeira letra. Tente colocar 
seu nome na tela, colocando a primeira letra na linha 
11, coluna 13. 


Nf PRINTEM 
ns; 
“ROBERTO” 


Vamos agora imprimir o carro na parte inferior da 
tela. O carro é composto de dois strings: 


u u 
nl e“ O 0”. Teremos as rodas na linha inferior, 
linha 21, eo corpo na linha 20. Vamos colocar 
ambos na coluna 6. Eis o programa: 
10 PRINT AT 20,6; " i 
20 PRINTAT2L6; "OD O! 


O próximo programa facilita o desenho de figuras do 
tamanho que desejar. 


10 INPUT “Linha?”; linha 

20 INPUT “Coluna?”; coluna 
30 INPUT “String?”; s$ 

40 PRINT AT linha, coluna; sê 
5Ô GOTO 10 
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QUALQUER STRING, LETRA, 
NÚMERO OU CARACTERE 


NÚMEROS AQUI, 
POR FAVOR 


Rode o programa. Caso você deseje alterar qualquer 
parte de sua figura, basta digitar algo por cima ou 
simplesmente um espaço sobre o que deseja alterar. 


Como parar o programa após ter concluído a figura? 


APERTE 
STOP 


Se desejar acrescentar algo após ter parado o 
programa, basta apertar CONT. CONT é a abreviação 
de CONTINUE, e está contido na tecla C. O programa 
continuará a partir do ponto em que parou. 


VOCÊ REPAROU MINHA FORMA 
RÁPIDA DE FAZER PRINT “LINHA?” 
 EINPUT LINHA NA LINHA 10 DO 
ÚLTIMO PROGRAMA? O BOM DISTO É QUE 
“LINHA?” DESAPARECE DEPOIS DE SUA 
ENTRADA (INPUT); LOGO NÃO ATRAPALHA 
À FIGURA. 
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Cores 


O TK90X possui oito cores. Estas cores estão escritas 
acima das teclas de números. 


BLUE RED MAGENTA GREEN CYAN YELLOW WHITE BLACK 


E Je ET UI] 


Vamos inicialmente alterar a cor das bordas de sua 
tela de TV. Você verá a palavra BORDER (borda) na 
tecla B. Diga ao TK90X BORDER 6. 


Você pode alterar as bordas em um programa. O 
próximo programa usa um loop FOR... NEXT para lhe 
mostrar as oito cores das bordas. 


I10FORb = TO 7 
20 BORDER b 

30 PAUSE 50 

40 NEXT b 


Você precisa de PAUSE 5Q na linha 30, caso contrário 
o TK90X irá trocar as cores tão rapidamente que você 
não conseguirá ver nada. 


O retângulo no interior da moldura é chamado de 
PAPER (papel). Você pode escrever nele com INK 


(tinta). 


Você encontrará papel (PAPER) e tinta (INK) abaixo da 
carreira inferior de teclas com letras vermelhas. 


INK PAPER 
Para usá-los você precisa do cursor E, e uma das teclas 
SHIFT. Obtenha o cursor E pressionando CAPS SHIFT 
e SYMBOL SHIFT. Mantendo uma das teclas SHIFT 
pressionada aperte PAPER. Solte a tecla SHIFT e aperte 
um número de O a 7. Aperte ENTER. Aperte ENTER 
novamente e a cor do papel na listagem de seu 
programa irá mudar. 


MINHAS PALAVRAS 
EM VERMELHO 
PRECISAM SHIFT. 


Usando o cursor E e SHIFT pressione INK e em 
seguida um número. Aperte ENTER duas vezes e seu 
programa será escrito com uma tinta de outra cor. 


Eis aqui um programa que lhe mostrará como ficam 
papel, tinta e moldura em cores diferentes. 
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16 LET b = INT (RND * 8) 

20 LET p = INT (RND * 8) 

30 LET i = INT (RND * 8) 

40 BORDER b : PAPER p : INK Ii 
50 PRINT “ TK9OX ”; 
60GOTO 10 


VOCÊ PODE COLOCAR 
COMANDOS DE COR 
NO SEU PROGRAMA. 


Você se lembra que no capítulo 18 nós somamos 1 ao 
número escolhido pelo TK90X para que nunca 
obtivéssemos À? Desta vez isto não foi feito. Nós 
desejamos que o número À apareça às vezes, visto que 
O corresponde à cor preta. INT (RND * 8) fornece um 
número de da 7. 


Cada vez que o loop for executado, o TK90X irá 
escolher as três cores aleatoriamente. Por que existem 
lugares onde o TK90X parece não ter escrito o seu 
nome? 


SE VOCÊ ESCREVE 
COM TINTA 
VERMELHA NUM 
PAPEL VERMELHO, 
OQUE OBTÉM?. 
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To 
EXERCÍCIO: 

Faça um programa para desenhar um disco voador 
azul em um céu amarelo sobre um planeta vermelho. 
Comece com 

5 PAPER 6: CLS 

Na linha seguinte, mude a cor da tinta para vermelho, 
e imprima a superfície na parte inferior da tela. 
Troque então a cor de sua tinta para azul, para 
desenhar o disco voador. 
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Figuras em 
Movimento 


É CLARO QUE VOCÊ PODE 
USAR SEU PRÓPRIO PLANETA E A 


O disco voador do capítulo passado vai pousar num 


planeta. O disco começará no topo-da tela (linha () e A linha 50 foi colocada para apagar o disco voador 

irá parar na linha 20, logo acima da superfície do antes que o próximo fosse impresso na linha abaixo. O 

planeta. Nós usaremos uma variável loop, chamada L, meu disco voador tem 6 caracteres de comprimento, 

para contar as linhas à medida que o disco desce. logo eu preciso de seis espaços em branco para apagá- 
lo. Se o seu tiver sete caracteres, você precisará de sete 

Eis o programa: espaços. 


Por que preciso de : IFL < 26 THEN na linha 50? 
5 PAPER 6: CLS 
1DINK 2: PRINT AT 21, 6; " Homem 


Po Ju “ 


PORQUE QUANDO O DISCO VOADOR CHEGA 
NA LINHA 20 DA TELA, ELE ATERRISSOU 
E NÃO QUEREMOS APAGÁ-LO. 


20 FORL = OTO 20 
30INK 1: PRINT ATL, 15; a 


40 PAUSE 20 
5BOIFL < 20THEN PRINTATL, 15; 


Ê HÁSEIS 
; ESPAÇOS AQUI 


Para fazer o disco mover-se mais rápido, faça o 
número de pausa menor. Se você colocar PAUSE Q, 
verá que o disco voador permanecerá parado até que 
você pressione uma tecla. Só então ele descerá uma 
linha. 


60 NEXT L 
Do 
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Você gostaria que o disco voador decolasse 
novamente? Duas linhas do programa precisam ser 
alteradas. 


20FORL = 20TO ÓSTEP—1 
50 PRINT AT L,15;” il 


STEP ESTÁ EM 
VERMELHO NA TECLA D 


Desta vez começaremos com o número 26 dentro da. 
caixa L para que o disco voador comece na linha 26 
da tela. STEP—1 diz ao TK90X como contar. A cada 
passo ele precisa subtrair 1 (um) do número na caixa L, 


EXERCÍCIO: 


Primeiro passe a cor do papel para branco e da tinta 
para preto, para que você possa ler seu programa com 
facilidade enquanto o digita. 


Um disco voador branco está cruzando o céu de uma 
cidade da esquerda para a direita. É noite. A cidade 
está acesa com luzes da cor ciano. 

Dica: O disco voador permanecerá na mesma linha 
da tela, mas se moverá a partir da coluna Ô através da 
tela. Use uma variável loop € para contar as colunas. 


Se a primeira linha do programa for 
5 PAPER O: CLS 


a cor do papel mudará para preto ao se rodar o 
programa. 


———— — — m 
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Para se produzir música no seu TK90X, diga a ele para 
SOUND (soar). A palavra SOUND encontra-se em 
vermelho, abaixo da tecla Z. Pressione CAPS SHIFT e 
SYMBOL SHIFT para obter o cursor E. Mantenha 
apertada uma das teclas SHIFT e pressione a tecla 


Agora você necessita um número para dizer ao TK90X 
quanto tempo ele deve “soar”. Quanto maior o 
número mais longa será a duração do som. Coloque o 
número 1 seguido de uma vírgula. 


SOUND 1, 


Agora nós precisamos de outro número para 
determinar a altura da nota que desejamos tocar. 
Quanto maior o número mais aguda é a nota, e 
quanto menor, mais grave é a nota. Tentemos 12. 


SOUND 1, 1R 


A ALTURA 
DA NOTA. 


Aperte ENTER. 


Se você desejar um som mais curto, forneça ao 
computador um número menor que 1, tal como .5, ou 
.25, mas não o faça muito curto senão nem irá ouvi-lo. 


Para aqueles que sabem ler música, este diagrama irá 
ajudá-lo a escrever suas próprias canções. 


Fa - 
a asso ulariIis Is 


-1-3 -5 -7 -8 10 12-13 15 


Tente este programa: 


10SOUND 5,7: SOUND .25,7: SOUND .25,4 
20SOUND  .5,0: SOUND .25,0 : SOUND .25,4 
30SOUND .25,7: SOUND .25,7: 

SOUND 25,7: SOUND .25,4 
A)SOUND .75,2: SOUND .25,4 
5OSOUND  .25,5: SOUND .255: 

SOUND .25,5: — SOUND.25,2 
60SOUND 5,7: SOUND .25,7: SOUND .25,9 
70SOUND .25,7:  SOUND.25,5: 

SOUND 25,4: SOUND .25,2 
80SOUND 75,0 


TENHO CERTEZA DE 
QUE VOCÊ CONHECE 
ESTA MÚSICA! 


EXERCÍCIO: 


Escreva um programa em que o TK90X escreve um 
trecho de música escolhendo números 
aleatoriamente. Toda vez que ele tocar uma nota, a 
moldura da tela deve mudar de cor. 


OUTRO EXERCÍCIO: 


Reveja o programa do disco voador do capítulo 22. 
Retire a linha de pausa, e em seu-lugar coloque uma 
linha que faça um “barulho de disco voador”. 


INKEY$ 


Em jogos de movimentos rápidos, você precisa que o 
computador corresponda no momento em gue se 
apertar uma tecla, e não espere até que se aperte 
ENTER. 


Felizmente, existe uma palavra em BASIC que nos 
ajudará a resolver este problema. Esta palavra é 
INKEY$, que significa “o caractere da tecla que está 
sendo pressionada” (KEY, em inglês, significa tecla). 


Eis um programinha usando INKEY$: 


10 PRINT INKEYS$; 
20 GOTO 10 


INKEY$ PRECISA DO 
CURSOR E. ELE ESTÁ 


Quando rodar este programa, inicialmente toda a tela 
ficará em branco. Aperte qualquer tecla. O 
computador imprimirá o caractere da tecla 
pressionada. Quanto mais tempo mantiver a 

tecla pressionada, maior será o número de vezes que 
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o caractere será impresso. Se você der um toque 
rápido na tecla, talvez consiga fazer o TK90X imprimir 
o caractere apenas uma única vez. 


O programa é um pequeno loop. Na linha 10, o 
computador verifica se você está pressionando uma 
tecla, Se estiver, ele imprimirá o caractere da tecla. Se 
não estiver, seguirá para a linha 20, e então voltará 
para a linha 19. De fato, o computador circula no loop 
muito rapidamente. Você entende porque, se mantiver 
a tecla pressionada, o caractere é impresso várias 
vezes? 


INKEY$ não é como INPUT. Quando o TK90X vê 
INPUT, ele espera que você digite algo. INKEY$ não 
espera, como verá no próximo programa. 


10 PRINT “vai ”; 

201F INKEY$ = “p” THEN GOTO 40 
3óGOTO 10 

40 PRINT “stop” 


VAL VAL VAI VAI VAL VAL. 


O loop vai da linha 18 a 36. O computador roda o 
loop, sem parar, até que você aperte “'p”. Apertar 
outra letra não adiantará. Tem de ser o p. 


Troque a linha 30, colocando “q” no lugar de “p”, e 
veja a diferença que isto faz. 


EXERCÍCIO: 


Escreva um programa para testar a sua rapidez. O 
computador diz a você para apertar p. Então ele inicia 
um loop do tipo “FOR...NEXT” contando de 1 à 1006. 
Se você apertar p, ele sairá do loop e dirá até que 
número contou. 


VOCÊ É LENTO! 
EU CONTEI 


Gravando o seu 
Programa 
em Fita Cassete 


Quando você tiver digitado um programa 
razoavelmente longo, provavelmente desejará guardá- 
lo para rodá-lo de novo mais tarde. Se você desligar o 
seu TK90X o programa estará perdido. Mas, antes de 

fazer isto, você poderá gravá-lo em uma fita cassete. 


Você precisa de um gravador cassete e uma fita 
virgem. Um gravador portátil deve servir, e de 
preferência use fitas C10, C12 ou C15. 


Conecte seu gravador à tomada (a não ser que 
funcione com pilhas). Introduza a fita. 


Acompanha o seu TK90X um cabo como este. 


O TK90X tem dois soquetes na parte traseira, um ao 
lado do outro, chamados MIC e EAR, 


Você verá que seu gravador também tem dois. 


Introduza um dos plugs do cabo de leitura e gravação 
na tomada MIC do gravador e o outro na tomada MIC 
do TK90X. 
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Coloque a fita no começo e adiante um pouco, até | 


que a fita marrom esteja aparecendo. Coloque o 
volume relativamente alto (em torno de 7, se tiver uma 
escala de 16 números). Se seu gravador tiver um 
controle de tonalidade, coloque o mais alto possível. 


Certifique-se de que a listagem de seu programa está 
na tela. 


1 SOUND 1,0 
20 SOUND LIZ 


30 GOTO 10 


Você tem de dar um nome ao seu programa. Se 
estiver salvando o programa do capítulo 23 poderia 
chamá-lo de “musica”. Você pode usar letras ou 
números como nome para seu programa. Este nome 
não poderá ter mais de 10 caracteres. 


Aperte a tecla SAVE e digite o nome de seu programa 


entre aspas. Digite ENTER. 
SAVE ESTÁ 
NA TECLA 8 


SAVE “musica” 


Você verá a mensagem: 
LIGUE O GRAVADOR E TECLE < ENTER > 
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Coloque o gravador para funcionar no modo de 
gravação (PLAY/REC) e aperte ENTER. 


Você verá linhas coloridas se movendo na tela, um 
pequeno intervalo, e em seguida mais linhas. A 
mensagem 6 Executado 0:1 diz que o TK90X terminou 
de gravar o programa. Pare o gravador cassete. 


Agora você pode pedir ao TK90X que verifique se o 
programa foi realmente gravado. 


DEIXE-ME 
VERIFICAR 


Introduza um dos plugs do cabo de leitura e gravação 
na tomada EAR do gravador, e o outro, na tomada 
EAR do TK90X. 


Rebobine a fita até o começo do programa. 


qem 
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-—— 
A palavra utilizada pelo TK90X para verificação é 


VERIFY. Esta se encontra abaixo da tecla R. Você 
precisa do cursor E e SHIFT. 


Aperte VERIFY e digite o nome de seu programa entre 
aspas. Coloque o gravador para tocar. 


Aperte ENTER. 


VERIFY“musica” 


Você deverá ver as mesmas linhas coloridas na tela. 
Depois de alguns instantes o nome de seu programa 
surgirá na tela. Quando você receber a mensagem 
À Executado 0:1 saberá que tudo foi corretamente 
gravado. 


Programa: musica 


O Executado 0:1 


Caso você não receba a mensagem O Executado 0/1, 
significa que algo saiu errado. Verifique se os cabos 
estão bem conectados. Aumente um pouco o volume 
do gravador. Peça ao computador que verifique 
novamente. Se não funcionar outra vez tente regravar 


(SAVE) o programa. 
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Quando você quiser seu programa salvo de volta no 


Com seu programa a salvo (gravado) na fita, você 
pode desligar o seu TK90X, ou escrever um novo 
programa. 


computador, deve usar a palavra chave LOAD 


(carregar). 


Há duas formas de se dizer ao computador para 
LOAD (carregar). 


Uma maneira é: 


LOAD ESTÁ NA 
TECLA 
g 


LOAD “” 


ESTE É UM STRING 
NULO: UM PAR DE 
ASPAS SEM NADA 
ENTRE ELAS. 


que irá carregar o primeiro programa que o TK90X 
encontrar na fita. 


A outra maneira é apertar LOAD e digitar o nome de 
seu programa entre aspas. 
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EU VOU PROCURAR NA 
FITA ATÉ ENCONTRAR 
“musica” 


Se você tiver mais de um programa gravado em uma 
fita cassete, o segundo processo é melhor, pois o 
TK90X buscará o programa desejado. 


Coloque a fita no começo. 


Introduza um dos plugs do cabo de leitura e gravação 
na tomada EAR do gravador, e o outro, na tomada 
EAR do TK90X. 


Digite ENTER. Você verá linhas coloridas através da 
tela. O nome do seu programa irá aparecer, e depois a. 
mensagem O Executado 6/1. 


Seu programa está pronto para rodar. 
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Planejando 
seus Programas 


Quando se escreve um programa é melhor planejá-lo 
antes de digitá-lo, pois frequentemente nos 
atrapalhamos ou esquecemos algo. 


EU JÁ CHAMEI UMA CAIXA 
DE a&? 
NÃO CONSIGO ME LEMBRAR 


Vamos planejar um programa chamado “Os Três 
Ratinhos”. Inicialmente escrevemos no papel tudo o que 
queremos que ele faça. 


O. computador irá escolher três cores. Depois mostrará 
os três ratinhos na tela, um de cada vez. Ele lhe 
perguntará quais eram as suas cores. Você digita os 
números correspondentes às três cores. O computador 
confere para saber se você está correto. Se estiver, 
escreverá por toda a tela “PARABENS” e tocará duas 
notas musicais. Se você estiver errado, ele escreverá 
“ERROU” por toda a tela e emitirá um som grave e 
longo. Façamos agora uma lista de variáveis, ou caixas, 
que usaremos. 
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Vamos colocar a figura do ratinho em a$. Eis a lista completa: 
u “ 
: l 
at 


b as e o ratinho 
ab 
” Variáveis numéricas 


ct cor do primeiro ratinho 

c2 cor do segundo ratinho 

c3 cor do terceiro ratinho 

rt seu palpite para a cor do primeiro ratinho 
r2 seu palpite para a cor do segundo ratinho 
r3 seu palpite para a cor do terceiro ratinho 


Variável string 


As três cores escolhidas pelo computador serão 
colocadas em cl, c2 e c3. 


EU DEVO COLOCAR 08 NÚMEROS 


Variáveis loop 


a loop que imprime “ERROU” 
b loop que imprime “PARABENS” 


Quando se digita um programa, pode-se colocar linhas 
de comentários. O computador não tomará 
conhecimento delas quando executar O prógrama, mas 
quando você olhar sua listagem mais tarde, lembrará o 
que cada parte faz. 


A palavra usada para isto pelo TK9)X é REM (abreviação 
de “remind” que, em inglês, significa lembrete). 


O loop que escreve “ERROU” será chamado de a, e o 
que escreve “PARABENS” de b. 


NÓS SOMOS AS VARIÁVEIS LOOP 
5 << 


REMÉA 
PALAVRA-CHAVE 
NA TECLA E 
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Vamos então, agora, escrever o programa “Os Três 
Ratinhos” colocando comentários: 


16 REM Os Tres Ratinhos 
20 REM O ratinho 
30 LET af = "as * 


46 REM O computador escolhe tres cores 
50 LET ct = INT (RND*7) 

6Ó LET c2 = INT(RND*7) 

70 LET c3 = INT(RND*7) 

8% REM Ele mostra os tres ratinhos 
90 INK ct : PRINT AT 16, 14; a$ 
10) PAUSE 20: CLS 

11 INK c2 : PRINT AT 16, 14; a$ 
126 PAUSE 20: CLS 

130 INK c3 : PRINT AT 10, 14; a$ 
146 PAUSE 26: CLS 


VOCÊ PODE TORNAR ESTE JOGO 
'MAIS FÁCIL OU DIFÍCIL, MUDANDO 
O TEMPO DA PAUSA, 


150 REM Voce da seu palpite 
166 INPUT “Primeira cor?” ; rl 
176 INPUT “Segunda cor?” ; 12 
186 INPUT “Terceira cor?”"'; 13 
190 REM O computador confere os seus numeros 
200 IF = ci ANDr2 = c2 AND13 = c3 
THEN GOTO 270 ES 


ANDEMANA TECLAS EI 


no 


210 REM Resposta errada 

220 FOR a = 1 TO 146 

230 INK 1: PRINT “ERROU”; 
240 NEXT a 
250) SOUND 2, — 12 
260 STOP , 


276 REM Resposta correta 
280 FOR b = 1 TO 78 
296 INK 2: PRINT “PARABENS “; 
300 NEXT b 

316 SOUND .5,6: SOUND .5,12 


BOA CAÇADA 
AOS RATOS! 


1 


Você Poderia 
Fazê-lo Assim 


Aqui estão algumas maneiras de se fazer os exercícios 
propostos em capítulos anteriores. Existem várias 
maneiras de fazê-los. Estas são somente sugestões. ] 


CAPÍTULO 6 


16 PRINT “Mario Dolacio" 
20 PRINT “Rua Arroio Pavuna, 234” 
30 PRINT “Rio de Janeiro” 


Você se lembrou de colocar o que queria imprimir 
entre aspas? 


CAPÍTULO 8 


16 PRINT “eta aeee et ed 


Você precisa de 32 asteriscos para completar a linha 
superior da tela. 


CAPÍTULO 10 


10 PRINT “Qual e o seu nome?” 


12 


20 INPUT a$ 


36 PRINT 

49 PRINT “Alo "; af 

ou 

10 PRINT “Qual e o seu nome?” 
20 INPUT a$ 


30 PRINT, “Alo ”'; a$ 


Você encontrou alguma outra maneira? 


CAPÍTULO 11 


16 PRINT “Aonde voce mora?” 

20 INPUT p$ 

36 PRINT 

40 PRINT p$ 

50 PRINT “e um lugar agradavel para morar” 


CAPÍTULO 14 


16 INPUT NUMERO 

26 INPUT NUMERO2 

30 LET RESPOSTA = NUMERO! + NUMERO2 
40 PRINT RESPOSTA 


Não faz diferença se você usar letras maiúsculas ou 
minúsculas. O computador sabe que RESPOSTA é o 
mesmo que resposta. 


CAPÍTULO 16 


13 


; + 


Resposta do exercício número 1: 


Não falo com gente chamada 


Valeria 
Prazer em conhecer você. 


Sugestão para o exercício número 2: 


16 PRINT “Qual o seu prato predileto?” 

20 INPUT p$ 

30CLS 

401F p$ <> “chips” THEN PRINT “ Eu detesto “ ; p$; 
“tt “Eu prefiro chips” : STOP 

50 PRINT “Eu concordo. Chips sao otimos!” 


CAPÍTULO 17 


10 PRINT “Digite um nome” 
26 INPUT n$ 
301F n$ = “fim” THEN STOP 
40 PRINT n$ 
5Ô GOTO 16 
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CAPÍTULO 18 


1ÓLET a = INT(RND * 100) + 1 

20 LET b = INT (RND * 100 + 1 

30LETc=a+b 

40PRINTa;/ + ";b; =" 

56 INPUT d 

66 PRINT d 

701F d = c THEN PRINT “Parabens” 
: STOP 

80 PRINT “A resposta certa e” ; c 


Tente modificar o programa de forma que possa tentar 
outra vez, em caso de erro. 


Depois modifique o programa de forma a ter somente 
três tentativas. 


Olhe novamente o programa de adivinhações. Ele lhe 
dará algumas idéias. 


CAPÍTULO 19 


Programa 1 
1ÓFOR a = Tto 20 
20PRINTa;'* 16 =";a*16 
30 NEXT a 


Programa 2 
19 FOR a = 1 TO 704 
20 PRINT “2?” ; 
30 NEXT a 


CAPÍTULO 21 


Existem várias maneiras. Eis aqui uma sugestão: 


5 PAPER 6 : CLS : 
10 INK 2: PRINT AT 21,6; umas 
ces 


" 


201INK 1: PRINT AT 10, 15; — alla 
mm” 


A linha 16 desenha a superfície do planeta em 
vermelho. Os caracteres gráficos são SHIFT 8 e SHIFT 3. 


O disco voador da linha 20 é 


GRAPHICS 
SHIFT 8 
E SHIFT 3 


CAPÍTULO 22 


5 PAPER Q: CLS 
101NK 5: PRINTAT21,0; Milha 
O —s E E mo” 


20 FOR c = ÓTO 26 
30INK7:PRINTAT6, Cc; malha 
AM PAUSE 16 

5Ó PRINT AT 6,c;” 

60 NEXT c 
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Você pode responder a esta pergunta? 


POR QUE A LINHA 20 NÃO 
E 
FOR Cc = 9 TOS? 


CAPÍTULO 23 


16 FOR m = 1 TO 16 
20LET a = INT (RND * 8) 
36 BORDER a 

46 SOUND 1, a 

5ÓNEXT m 


1ÓLET b = INT (RND * 8) 
20 LET n = INT(RND * 83) 
36 BORDER b 

40 SOUND 1, n 

59 GOTO 10 


AGORA TENTE MOVER 
O DISCO DA DIREITA 
PARA A ESQUERDA! 


RODE-08 E VEJA 
SE PERCEBE AS 
DIFERENÇAS. 
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CAPÍTULO 24 


10 PRINT “Aperte p” 

20 FOR a = 1 TO 1000 

30 !F INKEY$ = “p” THEN GOTO 56 
40 NEXT a 

56 PRINT “Eu conteiate “a 
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Jogos 


CAÇA-ESMERALDAS 


Este jogo é semelhante ao caça-níqueis, só que ao invés 
de frutas variadas piscando frente a seus olhos, esta 
máguina utiliza estrelas de diferentes cores. Quando 
você desejar “parar” as estrelas, aperte a tecla p. Se 
você obtiver três estrelas da mesma cor, marcará 10 
pontos, Duas de mesma cor lhe dão 5 pontos. Você 
pode “parar” as estrelas 25 vezes. Veja se você 
consegue quebrar a banca com 100 pontos. 

O programa é escrito somente com palavras BASIC que 
você aprendeu neste livro, além das palavras AND(e) e 
OR(ou). Você verá também INKEY$ em ação neste jogo. 


USE 
SYMBOL 
SHIFT PARA 
AND 
EOR 


Cada seção começa com um REM (lembrete) para que 
você saiba o que está sendo executado. 


Eis aqui uma lista das variáveis utilizadas no programa: 
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Lista de variáveis 


score começando em Ô 
rodadas — também começando em Ô 


as três cores escolhidas 


a 

b para as três estrelas 

c 

(6) esta variável aparece na linha 196, INPUT 


r$. Não importa o que se coloque em r$. 
Esta linha só existe para fazer o 
computador esperar até que você esteja 
pronto para que ele ative a máquina. 


Possíveis alterações 


Este é realmente um jogo de sorte. As estrelas giram tão 
rápido, que é realmente sorte parar três de mesma cor. 
Para torná-lo um jogo que exija habilidade, coloque 
uma pausa (PAUSE) após a impressão de cada estrela. 
Tente pausas de diferentes durações e veja qual lhe 
proporciona uma melhor partida (linhas 210, 240 e 
270. 


Outra coisa que você pode querer alterar é o número 
de rodadas a que você tem direito (linha 330), o score 
que quebra a banca (linha 175), e os sons que você 
ouve em diferentes estágios do jogo. Você pode também 
querer que o número de rodadas já executadas seja 
exibido na tela. 


Você poderia colocar uma linha extra para que três 
estrelas vermelhas lhe dêem 15 pontos. 


120 


28 REM Caca-Estrelas 
2a REM Tela 


38 BORDER 7: PAPER ?: 


120 PRINT AF 14,12; 
13580 PRINT BT 
“Aperte ENTER para rodar”! 
148 PRINT AT 18,6; 
“Aperte p para parar 

158 REM Scoree rodadas 
1690 LET score=: LET rodadas = 
178 INK B&B: PRINT AT 7,13,stcare 
475 IF score>:99 THEN 60 TO asa 


188 REM Roda 
198 INPUT FS 


395 REM 
Imprime estrelas e verifica parada 
208 LET a=INT (tRNDs6) +2 
214 INK a: PRINT AT JM, Id; CA 
226 FTF INKEV$="P” THEN CO TO 28 


238 LET b=INT IRND45] +1 
240 INK b: PRINT AT 10,1S;04" 
2S4 IF INKEYS="P” THEN GO TO 38 


268 LET C=INT IRNDI6) +31 
278 INK C: PRINT AT 18,16; 7%“ 
Sea IS INKEY$="D”" THEN GO TO 38 


ee” 802 TO me 

3024 REM Parada 

aBs LET rodadas = rodadas + 1 

315 IF a=b AND b=€ THEN LET sca 
re=5c01€+18: SOUND 1,8: SOUND Te &: 
SOUND 1,7: 60 TU Ga 

soa IF a=b OR a=€ OR b=c THEM É. 
ET score=score+5: SOUND 1.8: SOUND 


1,4 
se xr rodadas <26 THEN ED TO Z78 
340 REM Final ) 
34S INK 1: PRINT AT B.E; Seu tempo 
acabou”: SOUND 4.-12: STOP 
358 RE? Vitoria 
S6B INK 2: PRINT AT 3,4; 
“voce quebrou a banca”: FOR (=1 TA 
5: SOUND .25,42: SOUND .25,14: NEX 
+: sTOP 
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Aperte ENTER para rodar 
Aperte p para parar 


Seu tempo acabou 
em E 
EEE 


Aperte ENTER para rodar 
Aperte p para parar 


Voce quebrou a banca 


Aperte ENTER para rodar 
Apertar p para parar 
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TOUPEIRA MORSE 


Uma toupeira está escondida debaixo da terra, em uma 
área de 22 por 22 quadrados, e você deve encontrá-la. 
Você pode se mover para o norte, sul, leste ou oeste. A 
toupeira lhe enviará mensagens, em código morse, para 
lhe dizer que direção deve seguir. Veja se você 
consegue encontrá-la em dez movimentos ou menos. 


FLASH 1 NAS LINHAS 440 e 470 
FAZ A POSIÇÃO DA TOUPEIRA PISCAR. 
FLASH PRECISA DO CURSOR E E SHIFT 


Código morse para os quatro pontos cardeais: 
e o.“ ces 


Não vamos lhe dizer qual é qual. Você pode descobrir 
isto através do programa! 


Lista de variáveis 


I linha onde se encontra a toupeira 
c coluna onde se encontra a toupeira 
HI linha onde você se encontra 

cc coluna onde você se encontra 


s número de passos que você deseja dar 

d$ direção em que deseja se movimentar 

Z loop para trocar O lado direito da tela para 
branco 

m loop para seus movimentos 

v loop para tocar o som da vitória 
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Possíveis alterações 


Se você considerar a caçada à toupeira muito fácil (ou 
muito difícil) troque o número de movimentos a que 
tem direito (linha 190. 


Você sempre começa nã linha inferior da tela. 
Madifique a linha 150 para que o computador 
determine em que linha você irá começar. 


Por acaso, você pode começar no mesmo lugar em que 
se encontra a toupeira, sem que o saiba. Você acha, 
caso isto aconteça, que o som da vitória deve ser 
tocado? Ou seria melhor se o computador escolhesse 
um outro ponto de partida? Coloque uma linha extra 
(165) para solucionar este problema. 


DIREÇÃO 


Z% EEH toupeiramorse 
EB REM tela 
=R BORDER 7: PRRER &G. CLS 


ED PRINT BT z,85;" ho 

Za NEXT q 

Ba INK 2: PRINT AT 2,27; "NVLRT 
e227; eo 


qa PRINT AT 5 EE rd 
184 PRINT AT 2527: pPsar BaBril 


14% BEM posicao da toupeira 

1Be LET L=INT iRNDs:22) 
138 LET C=INTOo (RNDs0221 
14B REM sua posicao 


LET t é =81 
LET =INT (tRNDs22]) 
& PRINT AT Lit,ces o 
REM seu movimento 
FOR s=13 TO 18 
ENPUT “Direcao? Na Da E ou 
tia “sdk 
Bia” INPUT “Quantos passos?'';s 
2a REM estabelece sua nova 
posicao 
qo7e d&="Nº OR d&="n"” THEN LE 
= = 
14º. tod d$="S" OR dég="s" TREM LE 
sa IF ds="E” OR dg=“e” THER LE 
T ECc=ce+s 
262 IF dã="W” OR dé=On" THEN LE 
T cEexte-s 
B?R REM garante que voce fique na 
area de jogo 
20 IF 11>21 THEN LET tit=ei 
292 IF ti<g THEN LET Li=B 
0a IF cc>83 THEN LET coc=ai 
318 IF ceid THEN LET cc=8 
328 REM verifica se voceencontrou a 


ana IF Li=t AND ce=t THEN GG TO 


342 REM imprime sua nova posicao 
358 PRINT AT tlt,ces"m 
3588 REM resposta da toupeira 


feed fas oa 
pe Ra Dt] 
Eee] 

Las) 

É 

x 


ly 
ad” 
a 


370 IF ti>t THEN SOUND «6: PRA 
SE S: SOUND «2,8: PAUSE 15 

3“% IF tt<ct THEM SOUND .1,6: PER) 
BE S&: SOUND .12,6: PRUSE S: SOUND « 
1,6: PRUSE 15 

Bog IF cecc THEN SOUND ,3,6 

492 IF ce>c THEM SOUND .1,6: CER 
SE S: BEEP .3,6: PRUSE S&S: SOUND « 


3,6 
410 REM Volta para seu proximo 
movimento 
+22 NEXT Rm 
452 REM Fim dos movimentos - 
ádg INK O: PRINT FLASH 1;KT tac 


aBm BEEP 4,8: STOP 
asa REM Vitoria 
474 INK &: PRINT FLesH 2;AT Luc 


488 FOR v=1 TO 4 
42? SOUND 3,6: PRUSE S&S: SOUND ,3 
é: PRUSE 5. SOUND .1,6: PAUSE 15 
SOUND .3,6: PRUSE 15 
sem NEXT v 
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LEITOR DE MENTES 


Este programa lhe mostra como você pode ter uma 
longa conversa com o seu TK9X. Ele é baseado no jogo 
“pense em um número”. TKkumo, o grande leitor de 
pensamentos, vai descobrir o número que você pensou. 
Eu dei ao computador uma personalidade — arrogante 
e um pouco malcriado. 


Lista de variáveis 


as seu nome 

b$ sua resposta à pergunta (sim ou não) 

a o número pelo qual TKkumo lhe diz para 
multiplicar 

b o número que TKumo lhe diz para somar 

c o número que TKumo lhe diz para subtrair 

t variável loop para fazer com que o cérebro de 
TKumo apite 5 vezes. 


Possíveis alterações 


Eu não cologuei cores. Você poderia acrescentar uma 
linha 5, para estabelecer as cores da borda, papel e 
tinta, tais como: 


5 BORDER O PAPER 7: INK2 : CLS 


Você poderia ainda mudar as cores em vários pontos do 
programa ou colocar mais efeitos sonoros. 


Se você acha que TKumo está malcriado, troque suas 
palavras para que seja educado. 


Uma outra pergunta que você poderia colocar no final 
é “Gostaria que eu lesse sua mente outra vez?”. Se o 
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jogador disser sim, o computador limpa a tela e começa 
tudo outra vez. 
Uma linha como esta faz exatamente isto! 


650 IF b$ = “s” THEN RUN 


VOCÊ NÃO PODE 
ESCONDER NADA 
DE MIM! 


1% REM leitor de mentes 
D& PRINT Permita que eu me apresente.” *” Eu sou 
TKumo, o grande vidente” 
sê PousEe iea . 
a? PRINT “Por favor apresente-se a mim/'* 
* digitando seu nome: 
594 INPUT ag 
sê CLS . 
a PRINT Meus comprimentos, "; a$; “” 
75 PRUSE 124 
8? PRINT “Por favor pense um numero!” * 
” NÃO me diga qual” 
994 ppusE ler 
ana ES "Voce esta pronto?” 
Z18 3 “sou nº; 
ipê IF bã= 's TRÊn Go To asg 
430 IF bã=-n' THEN CLS : PRINT 
"Vamos la, ”; ag; * Ponha seu cerebro para 
trabalhar”. GO TO 48 
146 GO TO 118 


155 LET a=(INT iIRNDEO) +Ir sm 
X5B PRINT “Agora, ”; a$; “7” ” Multiplique seu 
numero por”; a; 
iFR PRUSE 1086 
I12R PRINT “Pronto?” 
iam INPUT “soun'.b$ ' 
BAR JF bá="go THEN GU TO 238 
2iá EF b&="n" THEN CLS : PRINT 
“Voce precisa aprender tabuada, '* 
“cabe t: GO TO 178 
Bê GO To 198 
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es8 CLS 
pãa PRINT 
“Certo. Vamos em frente” 


aee LET b= ENE, ND esa +11 2 


ABE PRINT “isto nao pode ser dificil para voce/'; 


Dom PAUSE 126 

sas Er nina 

: IN “sou n; 

Ste TE bê= so TREN GO TO FáB 
aBo TF nó="n” TREN Es : PRINT 


1 80 TE 228 


ELS 
PRINT “Bom” 
PRUSE 290 . . 
372 PRINT “Agora divida por dois.” * “Ou seja, 
ache a metade!” 
ss” PAUSE 100 . , 
3982 PRINT “ “Ainda nao terminou, '; 


2 INPUT "ibã 
S56 17 Lgevob FREN po TO 449 


228 TF bê&=“n" THEN CLS : PRINT 
“Vamos la, “; af; ““” * “Eu nao gosto 
de esperar”: 


so To see 


a 4288 
442 LET d=INT IRNDyb) +32: Cis 
438 PRINT “Finalmente, subtraia ”; 
d; ator 


4ÉB PRUSE 106 
476 FRINT 
“Quando términar, digite o numero 


obti 

28% PRINT . o 
“ “Ey vou usar os meus fantasticos poderes para adivinhar o 
numero que voce pensou inicialmente” 

298 INPUT n 


s4D CLS » 

n1Q PRINT “Desculpeo barulho do meu” 
“Sao For t=1 TO S&S 

52 SOUND .5, “50: SOUND «Ba RE 

Sam NEXT + 

550 LET fn=itinesd) 2) -bira 

Sea CLS :- PRINT 


“O numero que voce pensou” * “for”; fny; “.”” 


D7ê PRUSE 100 
BBB PRINT " “Estou certo?” 
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398 INDUT “soun;b$ 
E8B CLs 


iG TF bã= 5º THEN PRINT 
“Sou ou nao sou o maior?” 


6aB JF b$g=“2" THEN PRINT 
“E impossivel eu errar” “ “Voce errou nas contas” 


O ALIENÍGENA 


Um alienígena está tentando pousar na terra. Você 
possui uma arma, e tem de atingi-lo antes de seu pouso. 
Para atirar pressione À. Para mover para esquerda 
pressione 5 e para a direita pressione 8. 


As suas balas parecem pequenas flechas (1). 


O único trecho que utiliza palavras BASIC não 
abordadas neste livro está na seção que vai da linha 30 
até a 60, que desenham novos caracteres gráficos (o 
alienígena e o homem com a arma), e os armazenam 
na memória do computador. 


Lista de variáveis 


linha onde se encontra o alienígena 

coluna onde se encontra o alienígena 

linha onde você se encontra 

coluna onde você se encontra 

número escolhido aleatoriamente entre À e 2 
pelo computador. Se for Ô o alienígena se 
desloca para a esquerda. Se for 1 o alienígena se 
deslocará para direita. Se for 2 o alienígena 
permanecerá na mesma coluna. 

variável loop para imprimir a bala se movendo 
na tela 
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variável loop para tocar o som que indica a 


morte do alienígena 
variáveis utilizadas para definir os dois caracteres 


gráficos novos 


READ E POKE SÃO 
PALAVRAS-CHAVE. 
USR E DATA PRECISAM 
DO CURSOR E. 


NAS LINHAS 136, 220 E 240 
VOCÊ VERÁ “A”, TROQUE O CURSOR PARA 
G ANTES DE DIGITAR A. VOCÊ TAMBÉM 
PRECISARÁ DO CURSOR G PARA À LETRA 
B NAS LINHAS 140 E 370. 


Você notará que a última linha do programa troca as 
cores da borda e do papel de preto pata branco, e a 
tinta para preta. Isto é feito para facilitar a leitura da 
listagem de seu programa quando for efetuar alterações. 


Possíveis alterações 


Ao invés de um único alienígena, coloque uma 
quantidade deles, digamos uns dez. Coloque um loop 
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“| 


FOR... NEXT para isto. Comece o loop na linha 65. O 
final do loop estará na linha 40), portanto passe a linha 
409 atual para 410. 

Faça com que o computador conte quantos alienígenas 
você atingiu. É necessária uma variável numérica 
chamada SCORE. 

Zere esta variável antes do início do jogo (por exemplo 
na linha 65). Escolha um bom lugar na tela onde queira 
imprimir o score, e diga ao computador onde é, 
através de uma linha 165. Quando você destruir o 
alienígena o número no score deve ser acrescido de 
um. Coloque esta instrução na linha 316, logo antes de 
GOTO 49%. 


Para tornar o jogo mais fácil ou mais difícil, modifique a 
duração do SOUND na linha 220. 


10 REI3 alienigena 

em REM define caracteres 

38 FOR q=8 TO 45 

48 REND a: POKRE USR "“a"+a,a 
52 NEXT 9 


LS 
a 


69 DATA G2,42,62,8,127,73.8,54 
18,98,58,18,124,16,44,68 
*8 REM Fixaa posicao do afienigena, 


easua 
çSê LET L=0: LET c=INT irRNDIDB) 
+ 


98 LET tt=28: LET cr=16 
168 REM tela 
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118 RORDPER R: PAPER €: Cla 


1898 PRINT INK 4£:A7 21,6: "HNER “Elefante” e “Fogos de artifício” são programas 
138 PRINT INK GB;BF tocar ligeiramente mais longos, e possuem diversas palavras 
1io PRINT it Gar ti reprar do BASIC novas não explicadas neste livro. Eu os incluí 
Z68 REM move alienigena 3 para mostrar algumas das coisas que podem ser feitas 
ióe BRENTOAL Locoo quando se aprende um pouco mais sobre 
iso IF a =& AND C56 THEN LET C=t programação no seu TK90X. 
Bea IF m=1 AND CBS THEN LET Ca 
c+3 
Sãe FR NE nn ED Bt ETRAR. souND 
see I ; Cree: 
ces 2 + BT to ELEFANTE 
238 REM verifica se o alienigena 
pousou 
. Bé8 Ea + =28 THEN . Ra INK SEO Este é um jogo de sorte, mas no qual é necessário 
ND .S,-?: SOUND 4,-8: SOUND .5,-7: manter a atenção. O objetivo é construir seu elefante 
so Tê sam Ç ) 
25e REM VC o THEN 60 FO à antes que o seu adversário o faça. 
e as ore” a - , . 
npPB IF INKEYS Você deve usar um seis para o corpo, um cinco para o 
ese Ee iria 5: Sr ET rabo, quatro para as pernas, três para a cabeça, dois 
298 PRINT AT Frtc;” * ara a tromba e um para os olhos. Após cada lance dos 
38a NEXT p p 
Si IE E=€c THEM Fer bai Jo +: dados o TK9X perguntará se você pode usar este 
- -—1: SOUND - : EM : E + 
ora ieé t número para somar ao seu elefante. 
SS RENS RE Ye ro Lembre-se de quatro coisas: 
PES Jr INKEYB="5" BND cede sit 1) Antes de tudo você precisa dar ao elefante um corpo. 
nose Ir. INKEy$="8" BND ce «em THE 2) Você não pode lhe dar um olho ou uma tromba até 
378 PRINT INK S;AT tt.cc;rar que tenha uma cabeça. 
488 BORDER 7: PAPER 7: INK BO: S 3) Uma vez utilizado um número, não poderá utilizá-lo 
Tor novamente. Por exemplo, se seu elefante já possui um 
rabo, você não poderá usar O número cinco. 


4) O computador não lhe deixará trapacear! 
Tente e veja o que acontece. 


Três novos comandos BASIC são utilizados neste 
programa - DIM, GOSUB e RETURN. Todos são 
palavras-chave, por isso quando tiver de usá-las, basta 
pressionar a tecla em que estão escritas. | 


tn Lo 
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1a prEm elefante 
2a REM variaveis 
30 DIM pst2. 123): DIM FtB,5): D 


AM LET €Ctl=8: LET citBl=is 
te REM nomes 
45 INK Q: PRINT AT A,IZ; 
“Elefante” 
SS LET x=7: FOR a=15820 TO tI19B 
STEP -198: GO SUB 2: NEXT a 
eg FOR a=zi Te 2 
76 INPUT (“Jogador”;a) “Digite seu nome” * 


& NEXT 3 
oz 60 TO 2808 
1a RES imprime dados 
11R RO GUBE PSB: RETURN 
228 BO SUB 208: GO SUB 268: RET 


13% BO SUB PRO: CO SUR 238: SO 
SUB 268: RETURN 
ide 0 SUB PéR: CO SUB 215. EU 
SUB 259. GO SUB 260: RETUNH 
iba SO SUB 2902. GQ SUB 218: ER 
sus E 60 SUR 250: 60 SUB 258: 
RETI 
168 G0 SUB 202: GO SUE SIR. ER 
SuR 228. Go SUB Pé: GO SUR PER: 
Gô aUA P56: RETURN 
266 PRINT AT 5.x;a$%: RETURN 
2180 PRINT QT S.x+2;32%: RETURM 
228 DRINT AT S,x;a%: RETURN 
258 PRINT 9T G6,x+1,3%: RETURN 
240 PRINT AT &,x+2,3%: RETURH 
255 PRINTS BT F.x;ad: RETURA 
268 PRINT AT 7,xX+2,5%: RETURN 
388 REM remove elefante 
318 FOR a=18 TO 15 
sp PRINT AT a. Cip)+3;" 
**: SOUND 2,-S 
338 NEXT a 
asa FOR a=1i TO & 
s5e LET rtp,ai=8 
Ze6R NEXF a 
a7E RETURN 
118& REM olho 
2110 PRINT AT 22,.4+x; "0d" 
15429 RETURN 
1299 REM tromba 


1B1B PRIMT AT 345,2+4x;"Fr;aT ige 


+x:"EU:;AT IR Leno Br 

1228 RETURN 

1388 NEI cabeca 

1318 FOR FZz=18 TO 12: PRINT AT Z, 
Sax; CM. NEXT x 


1520 RETURN 

iaso FOR sia ro is: » 

I E= RINT ST 
S+x; "Em EM. Next Z+ 
ie26 RETURN 

FEbs BEE 

isis BN ST 13,33+x; "MA U:AT 13 
TAxx: CR t Lá 
25286 RETURN 

lisas REM corpo 

1515 FOR 2Z=18 TO 215: PRINT OT Ze. 
S+x; "EMEB: mEXT z 

1628 RETURN 

ese REM tela 

gaes Cs 

2810 INK SB: PRINT BT a,iIB; 

“Elefante” 

2828 FoR b=1 TO 2 

23838 PRINT INK b;AT aA.S+CIibI);psr 


dgãas MEXT b 

2as PRINT AT 18,3; "6 corpo s 

rabo 4 pernas “;RT 49,2;"3 cabeca 

2 tromba à olho” . 

EDem REM comeca jogo 

eBre FOR P=1 TO 2: INK p 

São INPUT INK p: fegtisr ) Sem 

Digite ENTER para rolar o dado dg 

2095 LET X=7+e Tp) 

sess ni OR e TO.7: PRINT AT s,x; 

: NE 

2uoes LET g= INT IRMNDXE? +13 


22188 FOR n=1 TO &: SOUND «3,4: SOU 
ND 24,3: NEXT B 

Seios LET ab=" 9" 

2128 GQ SUR sfiariem 

21415 LET Eá=u: ANPUT INK 2; 123 
tz? 4 * Voce pode usar isto 6 ou n? Í 
Vi DE 

2118 IF h$<5"s" BND béso>ho THEN 
Geo To gIla 

2196 IF rtp,dIi=i FHEN LET cá=smo 

Sa: Tip,e =8 BNO deb THEM LE 

21 Ea EP, 2“=0 BNO d<3 THEM LE 
Ea E B$="]5" BND cCê=Us" THEN L 
ET si So. SUB JriLB+rIRAR LE 

FT FP . = 

e138 Tantos” BND cg="n"º THEN & 
tz = 

ads IF r to. 2 =ã BND rip,2i=3 TH 


2158 NEXT had 
21698 60 TO 29878 


SL7a REM Vencedor 


2188 LE 
eis FG 


3588 PRINT AT 48,13+x;" “;AT 43, 
das Ra 

B218 PRINT RT 18,135»; mam 

2952 PRINT BT 18,134," . 

2258 PRINT AT S,iasx;*PCiAT a Ia 
ESSO ad 

2255 IF v=9 THEN 60 TO 2278 
BS40 PRINT AT 9,48+47" “;AT 

Sosa E 

e25B 50 suB 1588 


T X=E tp) 
Rwu=1 TO 16 


2255 SOUND .ã.ts 


2268 NE 


2278 PRINT FLASH 1:AT 2,B+4ctp3; 


KT 4 


“Vencedor” 
E2B8 IMPUY “Outra partida? (sou 
ny; z% 
224B IF Zz$=ºs*“ THEN RUM 
2380 IF Z$="R"" FHEN INK &B: 
=s28 EO TO 2288 
Elefante 
Elefante 
Vencedor 
Emilia Tania 
= s 
s 
E) 


5 rabo 4 pernas 
2 tromba 1 olho 
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FOGOS DE ARTIFÍCIO 


Este é um jogo de adivinhação de palavras. O 
computador escolhe uma palavra, e lhe diz quantas 
letras esta possui através de uma carreira de asteriscos. 
Você tem de descobrir qual é a palavra. Você pode 
adivinhar a palavra toda de uma só vez, ou letra por 
letra. 


Toda vez que você der um palpite errado, o homem 
com o baide se aproxima das três rodas de fogos de 
artifício. SE você errar dez vezes, ele jogará água sobre 
os fogos. Se, por outro lado, você descobrir a palavra, os 
fogos irão se acender. 


Se você tiver dificuldade em adivinhar a palavra, o 
computador lhe dará dicas. 


Você encontrará as dez palavras com dicas para cada 
uma delas nas linhas de 8100 a 9000 do programa. Se 
desejar alterar estas palavras, basta trocar estas linhas, 
colocando primeiro a nova palavra e em seguida a sua 
dica. 


Quando estiver digitando o programa, na linha 616, 
você deve trocar o cursor para G antes de digitar A, 
BCD e EFG. Você também precisará deste cursor na 
linha 1205 para He L. 


Dentre os dez novos comandos BASIC contidos neste 
programa, PLOT e DRAW são palavras-chave. 
RESTORE, LEN, CHR$, CODE, PI, SIN e COS precisam 
do cursor E, e BRIGHT e CIRCLE precisam do cursor E 
com SHIFT. 
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Fogos de Artifício 


Palavra 1 


FEREEEFErEE 


dra 


Fogos de Artificio 


Palavra 1 score 


corajoso Tem1 


19 REM . Fogos de Artifício 
2 BCARDE bb: PRPER >: ENK SB. C 


iRO RESTOPE 160 


110 FOR s50 Tó 741 
158 PORE Úsr “atsgad 
ê. 2R,48,1020 ,9052,952., 12B 


,16,2A,32,64., 25 
285º 316 156, 446º êS,.2e 
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So Tu 2aea 

REM Estado da adivinhacao 
PRINT OT S,3;tã 
RETURN. 


ET 
FOR b=1 TO LEN ug 
IF b>1i AND gé=LFib) THEN RE 


Ir Sines b) THEN LET tafbl= 
ss: SOUND 3,12: GQ SUE 322: LET 


ASB NEXT & 

da IF k=B TMEN LET p=pri: GO S 
tez Sae 

isa RETURN 

Age REM Verifica palavra 

Sta IE gêcv2uk THEN LET p=pri. & 
O cus EQB: RETURN 

s&? SOUND «2,18: LET tlã=wg: KRETU 


SEB REM Desenha homem 

Giz PRINT OT sS,prerto o Briger se 
DID; " BCDVS AT 28,P+2;” EFGU 

6292 IF pr& THEN SOUND «.&,-i2 

638 RETURN 

EB REM letra minuscula 

712 FOR i=i TO LEN SG 


?7ER IF CODE g&itt) 264 BND CODE s 
B(1)<92 THEN LET g&ili =CHR$ (COD 
E ogitj +38) 

2320 NEXT t 


742 RETURN 

aê REM acofe 

614 PRINT AT do BBjos 
19;:score;l em E] 
628 RETUAN 

Quê REM Pista 

a2a IF pista =1 THEN RETURN 
a18 ENPLET BRIGHT t; 


toereãtT 6, 


"Voce quer uma pista?" (soun) “i/Z% 
+56 IF zê=0nº OR Ex ON THEN RE 


ana IF zéê='s DR zê='S" THEN PR 
INT AT 20,272" pista CNT lB,2:mõ: R 


| 
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ETUER 

oia GO TO a1B 
Aga REM Primeira letra 
1918 INPUT BRIGHT à; 
“Quer saber a primeira” “letra?” (s ou 


no “Imã 

129204 IF zg="n'o DR z6=]NU THEN GE 

TURN . e 

1034 TF zo=*9o GR zã='S THEN LE 

É tgtii=vêtii: GO SUE 3046: RETUR 
1H4R GE TO 1219 

1198 Fogos de Artifício 

114 = STEÉR aàis 

3. 43 

14 

lisas Er 

115 PLOT Ms ,8d: asa a 

1168 DRA BD tSIN aa, 3840 aa 
117 NEXT 2 NEXT x: INK B 

118B RESTORE ?7BDE: FOUR dz) TO E: 
RERD du,pã 


= SOUND du,pi: NEXT d 

LET scoresaçore+i: GO suB 6 
Be: RETURA 

1226 FEM fogos de Artilício molhados 

ie INT HT 27,P+5;“HºAT 218.P 
+S, Pro 

1218 FOR c-18 TO 26 STER Ss 

ices PRINT INK S:AT 18.0: 
1238 FOR w=1 TO &: SOUND «23.3E: 


RJ 
i2ãm NEXT € 
1295? PRINT AT E,Ijwg 
12583 RETURN 
1338 REM Escolhe palavra 
à312 LET r=INT £RNDx101 41 
13028 IF mitri=1 TREN GO TO 1318 
1308 LET wmirit=ã 
1348 DESTOPE SOCBrILOB+Lr 
15360 RERD v$,n5 
136% DIM LS(LEN wg 
is7ê FOR 5s=2 TO LEN Lã 
i3B& LET lGts)="": NEXT s 


armam REM Comecaojogo 

2405 LET srcore=8: DIH vilps 

2216 FOR a=i TO 190: CLS 

2628 LET p=8:. LET pista =Z: LET ia 


2230 PRINT AT 2,5; 
“Fogos de Artifício” 


B2do FRINTOLNE A A ERES oiee 


E 


ana Ru nado POE ty 


3 NEXT 


a 
E2Se INPUT 
pap) 


DRTG 2.5, 7P,.8,72,1.5,22,.ma E 
ER DATA 1.5,24, 25, 16, .2B. 27,5 
Bm DETE “coraioso”, “bravo” 
RSA DATR “plateia”, pessoas assistindo a uma peca 
e teatro” 
ssa DATA “envelope”, 
nde se coloca uma carta” 
B DATR “manter, “alimentar” 
3 DRTA “congregacao”, 
DATA “medida”, “extensao” 
DATB “cauteloso”, “muito 
886% DATE “imenso, “enorme” 
sama BATA “interrupcao”, “intervalo” 
Same DATA “doenca”, “enfermidade” 


a palavra inteira 3 ENR Bs ” 
EMA = 
g5=" = agem Go TO assa 


LEN gã= à THEN GO SUE 4508 
LEN qgã>i THEN GO SUB BO 
p<liZ THEN GO TO iss 

sus 1288 

SUB ABE 

2228 IJF acio THEN INPUT 

Digite ENTER para proxima palavra “ ; x & 


PE 
RE Musica 


Rar ES TNT INR 3;AT 258.16:"% 


PRINT AT 4,140 Palavra “ia 


SU SuE F28 
TE tk=wmã THER GO SUB 2285: 
Eee 


TRERN DO SUB 500. LET 
END iglis=ate” AND ia 
SUE 120DB. LET tetsê: 


me 


* Digite sua tentativa 


=: *umaletra “ :9& 


* Digite ENTER para jogar 


1 


142 


RR 


Indice Analítico 

AT, 82 NEW, 30 
BORDER, 86 NEXT, 71 
BREAK, 62 Palavras-chave, 34 
Caracteres, 32 PAPER, 87 
CLS, 56 PAUSE, 73 
Cursor PRINT, 21 

de programa, 52 REM, 109 

E, 64 RND, 64 

G, 75 RUN, 28 

K, 34, 35 SAVE, 102 

L, 34, 35 Scroll, 65 
DELETE, 24 SOUND, 94 
EDIT, 57 STEP, 92 
ENTER, 23 STOP, 57 
FOR, 71 STRING, 32 
GOTO, 60 THEN, 56 
Graphics, 75 TO, 71 
IE 56 Variáveis 
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